home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / C64 / M-More Monthly Disks / (c)mb.d64 / identifier.c (.txt) < prev    next >
Commodore BASIC  |  2007-02-04  |  288b  |  11 lines
  1. 3 REM UPDATED ON JUNE 8 AT CEDAR GLEN         BY *** DAVID BRADLEY ***
  2. 4 PRINTPEEK(65408)
  3. 10 IF PEEK(65408)=0 THEN GOTO 25
  4. 15 IF PEEK(65408)=170THEN GOTO30
  5. 20 IF PEEK(65408)=3  THEN GOTO35
  6. 22 IF PEEK(65408)=96 THEN GOTO40
  7. 25 PRINT"COMMODORE64.MK2.":END
  8. 30 PRINT"COMMODORE64.MK1.":END
  9. 35 PRINT"COMMODORE64.MK3.":END
  10. 40 PRINT"COMMODORE SX-64":END
  11.